perm filename SAITRG[GEO,BGB]1 blob
sn#001320 filedate 1972-10-28 generic text, type T, neo UTF8
00100 EXTERNAL REAL SIMPLE PROCEDURE SIN (REAL X);
00200 EXTERNAL REAL SIMPLE PROCEDURE COS (REAL X);
00300 EXTERNAL REAL SIMPLE PROCEDURE ASIN (REAL X);
00400 EXTERNAL REAL SIMPLE PROCEDURE ACOS (REAL X);
00500 EXTERNAL REAL SIMPLE PROCEDURE SQRT (REAL X);
00600 EXTERNAL REAL SIMPLE PROCEDURE ATAN (REAL X);
00700 EXTERNAL REAL SIMPLE PROCEDURE ATAN2 (REAL Y,X);
00800 EXTERNAL REAL SIMPLE PROCEDURE LOG (REAL X);